home *** CD-ROM | disk | FTP | other *** search
- ***************
- *** 7,13 ****
- ;;; Scott Fahlman or slisp-group@cs.cmu.edu.
- ;;;
- (ext:file-comment
- ! "$Header: main.lisp,v 1.77 92/11/18 23:33:54 wlott Exp $")
- ;;;
- ;;; **********************************************************************
- ;;;
- --- 7,13 ----
- ;;; Scott Fahlman or slisp-group@cs.cmu.edu.
- ;;;
- (ext:file-comment
- ! "$Header: main.lisp,v 1.78 92/11/25 10:32:29 wlott Exp $")
- ;;;
- ;;; **********************************************************************
- ;;;
- ***************
- *** 1370,1376 ****
- (*last-message-count* 0)
- (*info-environment*
- (or (backend-info-environment *backend*)
- ! *info-environment*)))
- (with-compilation-unit ()
- (loop
- (multiple-value-bind (form tlf eof-p)
- --- 1369,1377 ----
- (*last-message-count* 0)
- (*info-environment*
- (or (backend-info-environment *backend*)
- ! *info-environment*))
- ! (*gensym-counter* 0))
- ! (clear-stuff)
- (with-compilation-unit ()
- (loop
- (multiple-value-bind (form tlf eof-p)
-